<!--#include virtual="/Common/Config.asp" -->
<!--#include virtual="/Common/Conn.asp" -->
<!--#include virtual="/Common/Function.asp" -->
<!--#include virtual="/2010admin/Login_INC.asp" -->
<%
Sql = "SELECT MenuID,MenuPath FROM admin_menu WHERE not (MenuPath is null or MenuPath='') "
Array_List  = GetRsRows(Sql)
If IsArray(Array_List) Then 
	For i=0 To UBound(Array_List,2)
		MenuID	 = Array_List(0,i)
		MenuPath = Replace(Array_List(1,i),"/2010admin/","/2010admin/")
		MenuPath = Replace(MenuPath,"/2010admin/","/2010admin/")
		Sql = "UPDATE admin_menu SET MenuPath = '"&MenuPath&"' WHERE MenuID="&MenuID
		writebr sql
		conn.execute(Sql)
	Next
	writebr "更新成功"
Else
	writebr "没有可更新的数据"
End If

%>
